object frmTalonarioOC: TfrmTalonarioOC
  Left = 13
  Top = 112
  Width = 1017
  Height = 570
  Caption = 'Listado Ordenes de Compra'
  Color = clBtnFace
  TransparentColorValue = clWhite
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnClose = FormClose
  DesignSize = (
    1009
    540)
  PixelsPerInch = 96
  TextHeight = 13
  object lblFechaIni: TLabel
    Left = 12
    Top = 16
    Width = 28
    Height = 13
    Caption = 'Inicio:'
  end
  object lblFechaFin: TLabel
    Left = 138
    Top = 16
    Width = 25
    Height = 13
    Caption = 'Final:'
  end
  object btnExcel: TSpeedButton
    Left = 975
    Top = 7
    Width = 26
    Height = 26
    Anchors = [akTop, akRight]
    Flat = True
    Glyph.Data = {
      46060000424D4606000000000000360400002800000016000000160000000100
      0800000000001002000000000000000000000001000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
      A6000020400000206000002080000020A0000020C0000020E000004000000040
      20000040400000406000004080000040A0000040C0000040E000006000000060
      20000060400000606000006080000060A0000060C0000060E000008000000080
      20000080400000806000008080000080A0000080C0000080E00000A0000000A0
      200000A0400000A0600000A0800000A0A00000A0C00000A0E00000C0000000C0
      200000C0400000C0600000C0800000C0A00000C0C00000C0E00000E0000000E0
      200000E0400000E0600000E0800000E0A00000E0C00000E0E000400000004000
      20004000400040006000400080004000A0004000C0004000E000402000004020
      20004020400040206000402080004020A0004020C0004020E000404000004040
      20004040400040406000404080004040A0004040C0004040E000406000004060
      20004060400040606000406080004060A0004060C0004060E000408000004080
      20004080400040806000408080004080A0004080C0004080E00040A0000040A0
      200040A0400040A0600040A0800040A0A00040A0C00040A0E00040C0000040C0
      200040C0400040C0600040C0800040C0A00040C0C00040C0E00040E0000040E0
      200040E0400040E0600040E0800040E0A00040E0C00040E0E000800000008000
      20008000400080006000800080008000A0008000C0008000E000802000008020
      20008020400080206000802080008020A0008020C0008020E000804000008040
      20008040400080406000804080008040A0008040C0008040E000806000008060
      20008060400080606000806080008060A0008060C0008060E000808000008080
      20008080400080806000808080008080A0008080C0008080E00080A0000080A0
      200080A0400080A0600080A0800080A0A00080A0C00080A0E00080C0000080C0
      200080C0400080C0600080C0800080C0A00080C0C00080C0E00080E0000080E0
      200080E0400080E0600080E0800080E0A00080E0C00080E0E000C0000000C000
      2000C0004000C0006000C0008000C000A000C000C000C000E000C0200000C020
      2000C0204000C0206000C0208000C020A000C020C000C020E000C0400000C040
      2000C0404000C0406000C0408000C040A000C040C000C040E000C0600000C060
      2000C0604000C0606000C0608000C060A000C060C000C060E000C0800000C080
      2000C0804000C0806000C0808000C080A000C080C000C080E000C0A00000C0A0
      2000C0A04000C0A06000C0A08000C0A0A000C0A0C000C0A0E000C0C00000C0C0
      2000C0C04000C0C06000C0C08000C0C0A000F0FBFF00A4A0A000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00A402A402A402
      A402A402A402A402A402A402A402A402000002A402A402A402A402A402A402A4
      02A402A402A402A40000A402FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA402
      000002A4FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF02A40000A402FFFFFFFF
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFA402000002A4FFFFFFFFFFFFFFFFFFFFFFA4
      02A402A402FF02A40000A402FF02A402A402A402A402A4FFA402A402A4FFA402
      000002A4FFA402A402A402A402A4FFA402A402A4FFFF02A40000A402FFFFA402
      A402A402A4FFA402A402A4FFFFFFA402000002A4FFFFFFA402A402A4FFA402A4
      02A402A4FFFF02A40000A402FFFFFFFFA402A4FFA402A402A402A402FFFFA402
      000002A4FFFFFFFFFFA4FFA402A402A4FFFFFFFFFFFF02A40000A402FFFFFFFF
      02FFA402A402A402A4FFFFFFFFFFA402000002A4FFFFFF02FFA402A402A402A4
      02A4FFFFFFFF02A40000A402FFFF02FFA402A402A402A402A402A4FFFFFFA402
      000002A4FFA4FFA402A402A4FFA402A402A402A4FFFF02A40000A402FF02A402
      A402A4FFFFFFA402A402A402FFFFA402000002A4FFFFFFFFFFFFFFFFFFFFFFFF
      FFFFFFFFFFFF02A40000A402FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA402
      000002A4FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF02A40000A402A402A402
      A402A402A402A402A402A402A402A402000002A402A402A402A402A402A402A4
      02A402A402A402A40000}
    OnClick = btnExcelClick
  end
  object btnNueva: TSpeedButton
    Left = 906
    Top = -1
    Width = 63
    Height = 42
    Anchors = [akTop, akRight]
    Caption = 'Nueva O.C.'
    Flat = True
    Glyph.Data = {
      36050000424D3605000000000000360400002800000010000000100000000100
      0800000000000001000000000000000000000001000000010000000000000101
      01000202020003090300040F0400041A060005270700053B0800054909000557
      0A0004600A0004640B0005600B0005580B00074B0C00093E0D000C2D0E000E23
      0F00101C11001218120014141400151515001616160017171700181818001919
      19001A1A1A001B1B1B001C1C1C001D1D1D001E1E1E001F1F1F00202020002121
      2100222222002323230024242400252525002626260027272700282828002929
      29002A2A2A002B2B2B002C2C2C002D2D2D002E2E2E002F2F2F00303030003131
      3100323232003333330034343400353535003636360037373700383838003939
      39003A3A3A003B3B3B003C3C3C003D3D3D003E3E3E003F3F3F00404040004141
      4100424242004343430044444400454545004646460047474700484848004949
      49004A4A4A004B4B4B004C4C4C004D4D4D004E4E4E004F4F4F00505050005151
      5100525252005353530054545400555555005656560057575700625262007F44
      7F0097389700B926B900E011E000F405F400FB02FB00FE00FE00FE00FE00FE00
      FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00
      FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00
      FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00
      FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00
      FE00FE01FE00FD01FD00FC03FC00FA05FA00F708F700F20EF200EB16EB00E023
      E000D135D100C347C300B25DB200A86BA800A274A2009C7D9C00968796009191
      9100929292009393930094949400959595009696960097979700989898009999
      99009A9A9A009B9B9B009C9C9C009D9D9D009E9E9E009F9F9F00A0A0A000A1A1
      A100A2A2A200A3A3A300A4A4A400A5A5A500A6A6A600A7A7A700A8A8A800A9A9
      A900AAAAAA00ABABAB00AEB0B000B1B6B600B5C0C200B8CACD00BBD4D800BCDC
      E200C2E6EC00C6ECF200C8EFF500CAF2F800CDF3F900CAF4FA00C7F4FB00C5F5
      FC00C2F5FC00BDF5FC00B4F5FC00ACF5FC00A2F5FC0098F4FC0094F5FC0092F4
      FC008EF4FC008AF3FC0087F3FC0086F1FC0084EFFC0081EDFB007EEBFB007BE8
      FB0078E5FA0077E1FA0075DFF90071DDF9006DDAF90069D7F80065D3F80062D1
      F8005FD0F8005DCEF8005ACCF80058CAF70056C9F70054C7F60051C5F4004EC2
      F10048BDEA0041B6E2003BB1DC0035ACD70031A8D4002DA4D10029A0CE00279D
      CB002399C8002197C6001F94C4001B90C1001489BB000C7FB4000578AF000477
      AE000375AD000275AC000274AC000274AC000274AC000274AC000274AB000375
      A9000579A300087F9800108C89001A9D790021A96F0024AF680022AB610022AB
      590023AD4F0021AB490021AA420020A83C001EA638001BA2330070EEEEEEEEEE
      EEEEEEEEEEEEEEEE7070EEE6DBD0D9D9D9D9D9D9D9D9E2EE7070EEDDE4CBD7D7
      D7D7D7D7D7D7E1D0EE70EED5EEBFD2D2D2D2D2D2D2D2E0BFEE70EED2E7CCCBCE
      CECECECECECEDFBEEE70EECEDFDCBFCACACACACACA0BDEBEDAEEEECDD2E7B6BC
      BBBBBBBC0BFC0BB6B5EEEEC8C8E7EEEEEEEEEE0BF7F7FA0BEEEEEEC5C4C4C5C4
      C4C50BFAF7F7F7FA0B70EEB6C3C3C3C3C30B0B0B0BF7FA0B0B0B70EEB6C2C2C2
      F0DFDFDF0BF8FD0B70707070EEEEEEEE707070700BFA0B707070707070707070
      7070700BFFFF0B7070707070707070707070700BFF0B70707070707070707070
      700B0B0B0B707070707070707070700B0B0B0B70707070707070}
    Layout = blGlyphTop
    OnClick = btnNuevaClick
  end
  object Label5: TLabel
    Left = 393
    Top = 5
    Width = 25
    Height = 26
    Alignment = taCenter
    Caption = 'Filtrar por:'
    WordWrap = True
  end
  object SpeedButton1: TSpeedButton
    Left = 850
    Top = 1
    Width = 51
    Height = 40
    Hint = 'Comparar Orden de Compra con Facturas...'
    Anchors = [akTop, akRight]
    Caption = 'Comparar'
    Flat = True
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
      0000377777777777777703030303030303037F7F7F7F7F7F7F7F000000000000
      00007777777777777777933393303933337073F37F37F73F3377393393303393
      379037FF7F37F37FF777379793303379793037777337F3777737339933303339
      93303377F3F7F3F77F3733993930393993303377F737F7377FF7399993303399
      999037777337F377777793993330333393307377FF37F3337FF7333993303333
      993033377F37F33377F7333993303333993033377337F3337737333333303333
      33303FFFFFF7FFFFFFF700000000000000007777777777777777030303030303
      03037F7F7F7F7F7F7F7F00000000000000007777777777777777}
    Layout = blGlyphTop
    NumGlyphs = 2
    ParentShowHint = False
    ShowHint = True
    OnClick = SpeedButton1Click
  end
  object SpeedButton2: TSpeedButton
    Left = 794
    Top = 1
    Width = 51
    Height = 40
    Hint = 'Detallar materiales solicitados por Obra'
    Anchors = [akTop, akRight]
    Caption = 'Detalle'
    Flat = True
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555000000
      000055555F77777777775555000FFFFFFFF0555F777F5FFFF55755000F0F0000
      FFF05F777F7F77775557000F0F0FFFFFFFF0777F7F7F5FFFFFF70F0F0F0F0000
      00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFFFFF70F0F0F0F0000
      00F07F7F7F7F777777570F0F0F0FFFFFFFF07F7F7F7F5FFF55570F0F0F0F000F
      FFF07F7F7F7F77755FF70F0F0F0FFFFF00007F7F7F7F5FF577770F0F0F0F00FF
      0F057F7F7F7F77557F750F0F0F0FFFFF00557F7F7F7FFFFF77550F0F0F000000
      05557F7F7F77777775550F0F0000000555557F7F7777777555550F0000000555
      55557F7777777555555500000005555555557777777555555555}
    Layout = blGlyphTop
    NumGlyphs = 2
    ParentShowHint = False
    ShowHint = True
    OnClick = SpeedButton2Click
    OnMouseMove = SpeedButton2MouseMove
  end
  object SpeedButton3: TSpeedButton
    Left = 736
    Top = 1
    Width = 51
    Height = 40
    Hint = 'Duplicar Orden de Compra'
    Anchors = [akTop, akRight]
    Caption = 'Duplicar'
    Flat = True
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF
      FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF
      FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077
      007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000
      7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039
      99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999
      99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
      99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
      93337FFFF7737777733300000033333333337777773333333333}
    Layout = blGlyphTop
    NumGlyphs = 2
    ParentShowHint = False
    ShowHint = True
    OnClick = SpeedButton3Click
  end
  object SpeedButton4: TSpeedButton
    Left = 287
    Top = 1
    Width = 58
    Height = 40
    Hint = 'Refrescar'
    Anchors = [akTop, akRight]
    Caption = 'Reordenar'
    Flat = True
    Glyph.Data = {
      36030000424D3603000000000000360000002800000010000000100000000100
      18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
      B1908EB1908EB1908EB1908EB1908EB1908EB1908EB1908EB1908EB1908EB190
      8EB1908EFF00FFFF00FFFF00FFFF00FFB1908EFEFBFAFEFBFAFEFBFAFEFBFAFE
      FBFAFEFBFAFEFBFAFEFBFAFEFBFAFEFBFAB1908EFF00FFFF00FFFF00FFFF00FF
      B1908EFEFBFAFEFBFAFEFBFAFEFBFACCE5CA007000007000CCE5CAFEFBFAFEFB
      FAB1908EFF00FFFF00FFFF00FFFF00FFB1908EFEFAF4FEFAF4007000CCE3C500
      7000CCE3C5CCE3C5007000FEFAF4FEFAF4B1908EFF00FFFF00FFFF00FFFF00FF
      B1908EFEF7F0FEF7F0007000007000CCE1C2FEF7F0FEF7F0CCE1C2FEF7F0FEF7
      F0B1908EFF00FFFF00FFFF00FFFF00FFB1908EFEF4EBFEF4EB00700000700000
      7000FEF4EBFEF4EBFEF4EBFEF4EBFEF4EBB1908EFF00FFFF00FFFF00FFFF00FF
      B1908EFEF2E6FEF2E6FEF2E6FEF2E6FEF2E6007000007000007000FEF2E6FEF2
      E6B1908EFF00FFFF00FFFF00FFFF00FFB1908EFEEFE2FEEFE2CCDAB7FEEFE2FE
      EFE2CCDAB7007000007000FEEFE2FEEFE2B1908EFF00FFFF00FFFF00FFFF00FF
      B1908EFFEDDDFFEDDD007000CED9B2CED9B2007000CED9B2007000FFEDDDFFED
      DDB1908EFF00FFFF00FFFF00FFFF00FFB1908EFFEBD9FFEBD9CED8B000700000
      7000CED8B0D3C1B1D3C1B1D3C1B1D3C1B1B1908EFF00FFFF00FFFF00FFFF00FF
      B1908EFFE9D4FFE9D4FFE9D4FFE9D4FFE9D4FFE9D4B5A193B2A092B19F91B09E
      90B1908EFF00FFFF00FFFF00FFFF00FFB1908EFFE6CFFFE6CFFFE6CFFFE6CFFF
      E6CFFFE6CF9C8B7E9C8B7E9C8B7E9C8B7EB1908EFF00FFFF00FFFF00FFFF00FF
      B1908EFFE3CBFFE3CBFFE3CBFFE3CBFFE3CBBAA697FAF6F0FAF6F0DECFCEB190
      8EFF00FFFF00FFFF00FFFF00FFFF00FFB1908EFFE1C6FFE1C6FFE1C6FFE1C6FF
      E1C6BAA697FAF6F0D5C0B7B1908EFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
      B1908EFFDEC2FFDEC2FFDEC2FFDEC2FFDEC2BAA697D5C0B7B1908EFF00FFFF00
      FFFF00FFFF00FFFF00FFFF00FFFF00FFB1908EB1908EB1908EB1908EB1908EB1
      908EB1908EB1908EFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
    Layout = blGlyphTop
    ParentShowHint = False
    ShowHint = True
    Spacing = 0
    OnClick = SpeedButton4Click
  end
  object edtFechaIni: TDateEdit
    Left = 48
    Top = 10
    Width = 78
    Height = 21
    Color = clWhite
    Ctl3D = False
    DefaultToday = True
    DialogTitle = 'Seleccione una Fecha'
    NumGlyphs = 2
    ParentCtl3D = False
    YearDigits = dyTwo
    TabOrder = 0
    Text = '07/12/06'
    OnChange = edtFechaIniChange
  end
  object edtFechaFin: TDateEdit
    Left = 177
    Top = 10
    Width = 95
    Height = 21
    Color = clWhite
    Ctl3D = False
    DefaultToday = True
    NumGlyphs = 2
    ParentCtl3D = False
    YearDigits = dyTwo
    TabOrder = 1
    Text = '07/12/06'
    OnChange = edtFechaIniChange
  end
  object grdSueldos: TRxDBGrid
    Left = 6
    Top = 48
    Width = 996
    Height = 490
    Hint = 'Doble click para abrir la Orden de Compra'
    Anchors = [akLeft, akTop, akRight, akBottom]
    Color = clWhite
    DataSource = s
    ParentShowHint = False
    PopupMenu = pop
    ReadOnly = True
    ShowHint = True
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnCellClick = grdSueldosCellClick
    OnDblClick = grdSueldosDblClick
    OnTitleClick = grdSueldosTitleClick
    Columns = <
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'NUMERO'
        Title.Alignment = taCenter
        Title.Caption = 'N'#250'mero'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = [fsBold]
        Width = 77
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'FECHA'
        Title.Alignment = taCenter
        Title.Caption = 'Fecha'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = [fsBold]
        Width = 99
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'RAZON'
        Title.Alignment = taCenter
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = [fsBold]
        Width = 240
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DENOMINACION'
        Title.Alignment = taCenter
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = [fsBold]
        Width = 262
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'valorLogico'
        Title.Alignment = taCenter
        Title.Caption = 'Usada'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = [fsBold]
        Width = 58
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'obs'
        Title.Alignment = taCenter
        Title.Caption = 'Observaciones'
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clNavy
        Title.Font.Height = -11
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = [fsBold]
        Width = 200
        Visible = True
      end>
  end
  object edtFiltro: TEdit
    Left = 424
    Top = 8
    Width = 121
    Height = 21
    BevelKind = bkFlat
    BorderStyle = bsNone
    CharCase = ecUpperCase
    Color = clWhite
    TabOrder = 3
    OnChange = edtFiltroChange
    OnKeyPress = edtFiltroKeyPress
  end
  object btnDesfiltrar: TBitBtn
    Left = 552
    Top = 8
    Width = 25
    Height = 22
    Enabled = False
    TabOrder = 4
    OnClick = btnDesfiltrarClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
      33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
      993337777F777F3377F3393999707333993337F77737333337FF993399933333
      399377F3777FF333377F993339903333399377F33737FF33377F993333707333
      399377F333377FF3377F993333101933399377F333777FFF377F993333000993
      399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
      99333773FF777F777733339993707339933333773FF7FFF77333333999999999
      3333333777333777333333333999993333333333377777333333}
    NumGlyphs = 2
  end
  object s: TDataSource
    DataSet = cds
    Left = 624
    Top = 8
  end
  object cds: TSQLClientDataSet
    CommandText = 
      'SELECT '#13#10'  ORDENCOMPRA.NUMERO,'#13#10'  ORDENCOMPRA.FECHA,'#13#10'  ORDENCOM' +
      'PRA.ESTADO,'#13#10'  PROVEEDOR.RAZON,'#13#10'  PRESUPUESTO.DENOMINACION,'#13#10'  ' +
      'ORDENCOMPRA.OBSERVACIONES,'#13#10'  ORDENCOMPRA.ID_OBRA,'#13#10'  ORDENCOMPR' +
      'A.ID_PROVEEDOR,'#13#10'  ORDENCOMPRA.SERIE'#13#10'FROM'#13#10'  ORDENCOMPRA'#13#10'  LEF' +
      'T JOIN PROVEEDOR ON (PROVEEDOR.ID_PROVEEDOR = ORDENCOMPRA.ID_PRO' +
      'VEEDOR)'#13#10'  LEFT JOIN PRESUPUESTO ON (ORDENCOMPRA.ID_OBRA = PRESU' +
      'PUESTO.ID_PRESUPUESTO)'#13#10'WHERE'#13#10'  ORDENCOMPRA.FECHA >= :fechaIni'#13 +
      #10'  AND ORDENCOMPRA.FECHA <= :fechaFin'#13#10'ORDER BY'#13#10'   ORDENCOMPRA.' +
      'SERIE DESC,'#13#10'   ORDENCOMPRA.NUMERO DESC'#13#10
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <
      item
        DataType = ftUnknown
        Name = 'fechaIni'
        ParamType = ptInput
      end
      item
        DataType = ftUnknown
        Name = 'fechaFin'
        ParamType = ptInput
      end>
    OnCalcFields = cdsCalcFields
    DBConnection = Datos.Con
    Left = 592
    Top = 8
    object cdsNUMERO: TIntegerField
      DisplayLabel = 'N'#186
      DisplayWidth = 80
      FieldName = 'NUMERO'
      Required = True
      DisplayFormat = '#,###,##0'
    end
    object cdsRAZON: TStringField
      DisplayLabel = 'Proveedor'
      DisplayWidth = 250
      FieldName = 'RAZON'
      Size = 40
    end
    object cdsFECHA: TSQLTimeStampField
      FieldName = 'FECHA'
      Required = True
      DisplayFormat = 'dd/mm/yyyy'
    end
    object cdsDENOMINACION: TStringField
      DisplayLabel = 'Obra'
      DisplayWidth = 250
      FieldName = 'DENOMINACION'
      Size = 50
    end
    object cdsESTADO: TSmallintField
      FieldName = 'ESTADO'
      OnChange = cdsESTADOChange
    end
    object cdsvalorLogico: TStringField
      FieldKind = fkLookup
      FieldName = 'valorLogico'
      LookupDataSet = cdsLogica
      LookupKeyFields = 'ID'
      LookupResultField = 'VALOR'
      KeyFields = 'ESTADO'
      Lookup = True
    end
    object cdsobs: TStringField
      FieldKind = fkInternalCalc
      FieldName = 'obs'
      Size = 200
    end
    object cdsOBSERVACIONES: TMemoField
      FieldName = 'OBSERVACIONES'
      BlobType = ftMemo
      Size = 1
    end
    object cdsID_OBRA: TSmallintField
      FieldName = 'ID_OBRA'
      Required = True
    end
    object cdsID_PROVEEDOR: TSmallintField
      FieldName = 'ID_PROVEEDOR'
      Required = True
    end
  end
  object cdsLogica: TSQLClientDataSet
    Active = True
    CommandText = 'LOGICA'
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <>
    CommandType = ctTable
    DBConnection = Datos.Con
    Left = 656
    Top = 8
    object cdsLogicaID: TSmallintField
      FieldName = 'ID'
      Required = True
    end
    object cdsLogicaVALOR: TStringField
      FieldName = 'VALOR'
      Required = True
      Size = 2
    end
  end
  object pop: TPopupMenu
    Left = 224
    Top = 160
    object AbrirOrdendeCompra1: TMenuItem
      Caption = 'Abrir Orden de Compra...'
      OnClick = grdSueldosDblClick
    end
    object CompararOrdendeCompraconFacturas1: TMenuItem
      Caption = 'Comparar Orden de Compra con Facturas...'
      OnClick = SpeedButton1Click
    end
    object DuplicarOrdendeCompra1: TMenuItem
      Caption = 'Duplicar Orden de Compra...'
      OnClick = SpeedButton3Click
    end
  end
end
